<?
$dir=opendir("/usr/lib/asterisk/modules");
while(($file=readdir($dir))!==false){
    if($file=="." || $file=="..") continue;
    if (is_dir("$file"))continue;
    if($file=="res_config_mysql.so")continue;
    $file_arr[]=$file;
}
sort($file_arr);
$f=file("/etc/asterisk/modules.conf");
foreach($f as $i){
    $i=str_replace(" ", "", $i);
    if(!preg_match("~\[.+?\]|^;|preload~", $i) && preg_match("!=>!", $i)){
	preg_match("!(.+?)=>(.+?)\n!", $i, $preg);
    	if(preg_match("!^load!", $preg[1])){
	    $load_arr[]=$preg[2];
    	}
    	if(preg_match("!^noload!", $preg[1])){
	    $noload_arr[]=$preg[2];
    	}
    }
}
foreach($file_arr as $i=>$ii){
    $table.="<tr>\n\t"
	."<td height=\"20\" style=\"border-right: 1px solid #c0c0c0;border-bottom: 1px solid #c0c0c0;\" align=\"left\" width=\"500\"><font class=z11 size=-1>&nbsp;"
	.$ii
	."</font>\n\t</td>\n"
	."\t<td style=\"border-right: 1px solid #c0c0c0;border-bottom: 1px solid #c0c0c0;\" width=\"200\">&nbsp;";
    if(in_array($ii, $load_arr)){
	$table.="<select name=\"".$_POST["cases"]."_".$ii."\"  onblur=\"post_modules(this.name,this.value);\" class=\"select\">"
    	    ."<option value=\"auto\">Автоматически</option>"
    	    ."<option selected value=\"load\">Вручную</option>"
    	    ."<option value=\"noload\">Отключен</option>"
	    ."</select>\n";
    }
    elseif(in_array($ii, $noload_arr)){
	$table.="<select name=\"".$_POST["cases"]."_".$ii."\"  onblur=\"post_modules(this.name,this.value);\" class=\"select\">"
    	    ."<option value=\"auto\">Автоматически</option>"
    	    ."<option value=\"load\">Вручную</option>"
    	    ."<option selected value=\"noload\">Отключен</option>"
	    ."</select>\n";
    }
    else{
	$table.="<select name=\"".$_POST["cases"]."_".$ii."\"  onblur=\"post_modules(this.name,this.value);\" class=\"select\">"
    	    ."<option selected value=\"auto\">Автоматически</option>"
    	    ."<option value=\"load\">Вручную</option>"
    	    ."<option value=\"noload\">Отключен</option>"
	    ."</select>\n";
    }
    $table.="\t</td>\n"
	."</tr>\n";	
}
$table=xparse("tpl/tablem.html");
?>